//=====================================================================
//ZNPCǷǻ1
//	]P|ǻP|~ǿǫ^
//  callfunc "Refine1","NPCName",SuccessEmotion,FalureEmotion;
//--------------------------------------------------------------------

function	script	Refine1	{
	mes "["+getarg(0)+"]";
	mes "ڬOMҪZP㪺KKC";
	mes "ڥiHAҸ˸mؤ~C";
	mes "AQnҸ˸mؤ@~OH";
	next;
	set '@i,select(getequipname(1),getequipname(2),getequipname(3),getequipname(4),getequipname(5),
				getequipname(6),getequipname(7),getequipname(8),getequipname(9),getequipname(10));
	mes "["+getarg(0)+"]";
	if(getequipisequiped('@i)==0) {
		switch('@i) {
		case 1:
			mes "nnڧAYұoo@IڡH";
			break;
		case 2:
			mes "ӧaI";
			mes "ڷ|ΧڼӺҧAC";
			break;
		case 3:
			mes "ܩpA{b٨Sا޳NbAˤWbCK";
			break;
		case 4:
			mes "ܩpA{b٨Sا޳NbAkˤWbCK";
			break;
		case 5:
			mes "A֦˸mؤSܱOܡH";
			break;
		case 6:
			mes "A}uOqCKK";
			break;
		case 7:
		case 8:
			mes "AOظ˹~H";
			break;
		case 9:
		case 10:
			mes "AOظ˹~H";
			mes "AӤ|OYLaH";
			break;
		}
		return;
	}
	if(getequipisenableref('@i)==0) {
		mes "o˳ƵLkҡC";
		return;
	}
	if(getequipisidentify('@i)==0) {
		mes "oӦ]OųwҥHҡC";
		return;
	}
	if(getequiprefinerycnt('@i)>=get_maxrefine()) {
		mes "o˳ƤwgҨ̰šALkAҤFC";
		return;
	}
	//^IZXUfƪO|~IDyDsEs
	if('price[0]==0) {
		setarray 'price,10000,250,1000,10000,20000;
		setarray 'itemid,985,1010,1011,984,984;
	}
	set '@wlv,getequipweaponlv('@i);
	switch('@wlv) {
	case 0:
		mes "nҧAҿܪo˳ơA";
		mes "ݭn^ff9999T^00000010000ZenyOΡC";
		mes "An~ܡH";
		break;
	case 1:
		mes "AQnҪZ1ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤ@^000000HζO250ZenyC";
		mes "An~ܡH";
		break;
	case 2:
		mes "AQnҪZ2ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤG^000000HζO1000ZenyC";
		mes "An~ܡH";
		break;
	case 3:
		mes "AQnҪZ3ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO10000ZenyC";
		mes "An~ܡH";
		break;
	case 4:
		mes "AQnҪZ4ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO20000ZenyC";
		mes "An~ܡH";
		break;
	}
	next;
	if(select("~","")==2) {
		mes "["+getarg(0)+"]";
		mes "YϧAQڤ]SkK";
		return;
	}
	if(getequippercentrefinery('@i) < 100) {
		mes "["+getarg(0)+"]";
		if('@wlv==0) {	//㪺ɭ
			mes "IݨӳowgҫܦhFK";
			mes "pGnAҪܥi|ylaA";
			mes "laܸ̭d|C";
			mes "D||aOC";
		}
		else {		//Zɭ
			mes "IݨӳoZwgҫܦhFK";
			mes "pGnAҪܥi|ylaA";
			mes "laܸ̭d|C";
			mes "DZ||aOC";
		}
		mes "AAT{@UK";
		mes "un~ҶܡH";
		next;
		if(select("~","")==2) {
			mes "["+getarg(0)+"]";
			mes "ܦnC";
			mes "pGӹLLzҸ˳ƦӳylaA";
			mes "ڤ߱]|aK";
			return;
		}
	}
	if(countitem('itemid['@wlv])<1 || Zeny<'price['@wlv]) {
		mes "["+getarg(0)+"]";
		mes "oǴNOAҾ֦Ҧ~ܡH";
		mes "MܥiAOAƤA";
		mes "ڤ]bRUC";
		mes "AAڥIX]ӱonҦìC";
		return;
	}
	delitem 'itemid['@wlv],1;
	set Zeny,Zeny-'price['@wlv];
	mes "["+getarg(0)+"]";
	mes "I I !!";
	if(getequippercentrefinery('@i) > rand(100)) {
		successrefitem '@i;
		next;
		emotion getarg(1);
		mes "["+getarg(0)+"]";
		mes "haI";
		mes "wgnFC";
		mes "n[SҥXu誺˳ƤFA";
		mes "˳ܱjFA@w]ܰaH";
	}
	else {
		failedrefitem '@i;
		next;
		emotion getarg(2);
		mes "["+getarg(0)+"]";
		mes "yyyyyyyK";
		next;
		mes "["+getarg(0)+"]";
		mes "I";
		mes "ZbҪL{laFK";
		mes "ڡKڡKNiDLA|o˪K";
	}
	return;
	//close
}

//=====================================================================
//ZNPCǷǻ2
//	]ǣ~PǴ^
//  callfunc "Refine2","NPCName",SuccessEmotion,FalureEmotion;
//--------------------------------------------------------------------

function	script	Refine2	{
	mes "["+getarg(0)+"]";
	mes "JMӤFNOhoܡA";
	mes "XAnҪ˳ƨӧaC";
	next;
	set '@i,select(getequipname(1),getequipname(2),getequipname(3),getequipname(4),getequipname(5),
				getequipname(6),getequipname(7),getequipname(8),getequipname(9),getequipname(10));
	mes "["+getarg(0)+"]";
	if(getequipisequiped('@i)==0) {
		switch('@i) {
		case 1:
			mes "ګܦISŸA}I";
			mes "YA]|ܱooI";
			break;
		case 2:
			mes "ګܦASŸA}I";
			mes "A쩳S߭nҰ";
			break;
		case 3:
			mes "ګܦASŸA}I";
			break;
		case 4:
			mes "ګܦASŸA}I";
			break;
		case 5:
			mes "ګܦASŸA}I";
			mes "A쩳QnˡI";
			break;
		case 6:
			mes "ڳ̰QAoطRôMHa}ߪHFI";
			break;
		case 7:
			mes "AnӴMڶ}ߪܡANںuXhI";
			break;
		case 8:
			mes "AnӴMڶ}ߪܡANںuXhI";
			break;
		case 9:
			mes "Ab򰭸ܰڡI";
			mes "ڻFګܦI";
			break;
		case 10:
			mes "Ab򰭸ܰڡI";
			mes "ڻFګܦI";
			break;
		}
		return;
	}
	if(getequipisenableref('@i)==0) {
		mes "o˳ƵLkҡC";
		mes "пLC";
		return;
	}
	if(getequipisidentify('@i)==0) {
		mes "DOFA";
		mes "SҡK";
		return;
	}
	if(getequiprefinerycnt('@i)>=get_maxrefine()) {
		mes "oӤwgҤFA";
		mes "]SHҡC";
		return;
	}
	//^IZXUfƪO|~IDyDsEs
	if('price[0]==0 || 'itemid[0]==0) {
		setarray 'price,10000,250,1000,10000,20000;
		setarray 'itemid,985,1010,1011,984,984;
	}
	set '@wlv,getequipweaponlv('@i);
	switch('@wlv) {
	case 0:
		mes "nҧAҿܪo˳ơA";
		mes "ݭn^ff9999T^000000HζO10000ZenyC";
		mes "@򳣤֡C";
		mes "TwnҶܡH";
		break;
	case 1:
		mes "AQnҪZ1ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤ@^000000HζO250ZenyC";
		mes "@򳣤֡C";
		mes "TwnҶܡH";
		break;
	case 2:
		mes "AQnҪZ2ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤG^000000HζO1000ZenyC";
		mes "@򳣤֡C";
		mes "TwnҶܡH";
		break;
	case 3:
		mes "AQnҪZ3ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO10000ZenyC";
		mes "n[SXڪOFC";
		mes "TwnҶܡH";
		break;
	case 4:
		mes "AQnҪZ4ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO20000ZenyC";
		mes "n[SXڪOFC";
		mes "4ZڡKnġI";
		mes "TwnҶܡH";
		break;
	}
	next;
	if(select("~","")==2) {
		mes "["+getarg(0)+"]";
		mes "}򪱯ڡI";
		return;
	}
	if(getequippercentrefinery('@i) < 100) {
		mes "["+getarg(0)+"]";
		mes "KAb˨o·ЪFKC";
		mes "oӦҤWMIC";
		mes "An~ܡH";
		next;
		if(select("~","")==2) {
			mes "["+getarg(0)+"]";
			mes "LK";
			mes "ګܦA^hC";
			return;
		}
	}
	if(countitem('itemid['@wlv])<1 || Zeny<'price['@wlv]) {
		mes "["+getarg(0)+"]";
		mes "@֡C";
		mes "QҪܦhsIAӧaC";
		return;
	}
	delitem 'itemid['@wlv],1;
	set Zeny,Zeny-'price['@wlv];
	mes "["+getarg(0)+"]";
	mes "I I !!";
	if(getequippercentrefinery('@i) > rand(100)) {
		successrefitem '@i;
		next;
		emotion getarg(1);
		mes "["+getarg(0)+"]";
		mes "שҧաI";
		mes "wUA{C";
	}
	else {
		failedrefitem '@i;
		next;
		emotion getarg(2);
		mes "["+getarg(0)+"]";
		mes "K";
		next;
		mes "["+getarg(0)+"]";
		mes "uOѡK";
		mes "HͦɴNOo˰ڡC";
		mes "nӧCFK";
	}
	return;
	//close
}

//=====================================================================
//ZNPCǷǻ3
//	]ǫ^
//  callfunc "Refine3","NPCName",SuccessEmotion,FalureEmotion;
//--------------------------------------------------------------------

function	script	Refine3	{
	mes "["+getarg(0)+"]";
	mes "ڬOMҪZP㪺KKC";
	mes "ڥiHAҸ˸mؤ~C";
	mes "AQnҸ˸mؤ@~OH";
	next;
	set '@i,select(getequipname(1),getequipname(2),getequipname(3),getequipname(4),getequipname(5),
				getequipname(6),getequipname(7),getequipname(8),getequipname(9),getequipname(10));
	mes "["+getarg(0)+"]";
	if(getequipisequiped('@i)==0) {
		switch('@i) {
		case 1:
			mes "nnڧAYұoo@IڡH";
			break;
		case 2:
			mes "ӧaI";
			mes "ڷ|ΧڼӺҧAC";
			break;
		case 3:
			mes "ܩpA{b٨Sا޳NbAˤWbCK";
			break;
		case 4:
			mes "ܩpA{b٨Sا޳NbAˤWbCK";
			break;
		case 5:
			mes "A֦˸mؤSܱOܡH";
			break;
		case 6:
			mes "A}uOqCKK";
			break;
		case 7:
		case 8:
			mes "AOظ˹~H";
			break;
		case 9:
		case 10:
			mes "AOظ˹~H";
			mes "AӤ|OYLaH";
			break;
		}
		return;
	}
	if(getequipisenableref('@i)==0) {
		mes "o˳ƵLkҡC";
		return;
	}
	if(getequipisidentify('@i)==0) {
		mes "oӦ]OųwҥHҡC";
		return;
	}
	if(getequiprefinerycnt('@i)>=get_maxrefine()) {
		mes "o˳ƤwgҨ̰šALkAҤFC";
		return;
	}
	//^IZXUfƪO|~IDyDsEs
	if('price[0]==0 || 'itemid[0]==0) {
		setarray 'price,10000,250,1000,10000,20000;
		setarray 'itemid,985,1010,1011,984,984;
	}
	set '@wlv,getequipweaponlv('@i);
	switch('@wlv) {
	case 0:
		mes "nҧAҿܪo˳ơA";
		mes "ݭn^ff9999T^00000010000ZenyOΡC";
		mes "An~ܡH";
		break;
	case 1:
		mes "AQnҪZ1ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤ@^000000HζO250ZenyC";
		mes "An~ܡH";
		break;
	case 2:
		mes "AQnҪZ2ZڡH";
		mes "nҪܻݭn^ff9999jƪZΪ-jƯżƤG^000000HζO1000ZenyC";
		mes "An~ܡH";
		break;
	case 3:
		mes "AQnҪZ3ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO10000ZenyC";
		mes "An~ܡH";
		break;
	case 4:
		mes "AQnҪZ4ZڡH";
		mes "nҪܻݭn^ff9999^000000HζO20000ZenyC";
		mes "An~ܡH";
		break;
	}
	next;
	if(select("~","")==2) {
		mes "["+getarg(0)+"]";
		mes "AΨ򻰡K";
		return;
	}
	if(getequippercentrefinery('@i) < 100) {
		mes "["+getarg(0)+"]";
		if('@wlv==0) {	//㪺ɭ
			mes "IݨӳowgҫܦhFK";
			mes "pGnAҪܥi|ylaA";
			mes "laܸ̭d|C";
			mes "D||aOC";
		}
		else {		//Zɭ
			mes "IݨӳoZwgҫܦhFK";
			mes "pGnAҪܥi|ylaA";
			mes "laܸ̭d|C";
			mes "DZ||aOC";
		}
		mes "AAT{@UK";
		mes "un~ҶܡH";
		next;
		if(select("~","")==2) {
			mes "["+getarg(0)+"]";
			mes "ܦnC";
			mes "pGӹLLzҸ˳ƦӳylaA";
			mes "ڤ߱]|aK";
			return;
		}
	}
	if(countitem('itemid['@wlv])<1 || Zeny<'price['@wlv]) {
		mes "["+getarg(0)+"]";
		mes "nOSN^aYۤvnաK";
		return;
	}
	delitem 'itemid['@wlv],1;
	set Zeny,Zeny-'price['@wlv];
	mes "["+getarg(0)+"]";
	mes "I I !!";
	if(getequippercentrefinery('@i) > rand(100)) {
		successrefitem '@i;
		next;
		emotion getarg(1);
		mes "["+getarg(0)+"]";
		mes "haI";
		mes "wgnFC";
		mes "n[SҥXu誺˳ƤFA";
		mes "˳ܱjFA@w]ܰaH";
	}
	else {
		failedrefitem '@i;
		next;
		emotion getarg(2);
		mes "["+getarg(0)+"]";
		mes "KKK";
		next;
		mes "["+getarg(0)+"]";
		mes "K";
		mes "ZbҪL{laFK";
		mes "ڡKڡKNiDLA|o˪K";
	}
	return;
	//close
}

// ----- R -----
alberta_in.gat,28,58,4	script	pwQ	85,{
	callfunc "Refine1","pwQ PְҮ]",18,4;
	close;
}
// ----- w -----
prt_in.gat,63,60,0	script	Js	85,{
	callfunc "Refine1","Js",21,23;
	close;
}
// ----- ùJ -----
morocc_in.gat,73,38,4	script	ȩԥ	99,{
	callfunc "Refine3","ȩԥ FC",30,16;
	close;
}
// -----  -----
payon.gat,144,173,5	script	wF	88,{
	callfunc "Refine2","wF",0,32;
	close;
}
// ----- ׿ -----
yuno_in01.gat,171,21,4	script	}S	85,{
	callfunc "Refine2","}S",9,0;
	close;
}
// ----- 㭵ùJ -----
ein_in01.gat,24,87,5	script	Ҷ𴵰	826,{
	callfunc "Refine1","Ҷ𴵰 J",18,4;
	close;
}


//====================================================================
//۳cNPC
//--------------------------------------------------------------------

-	script	BuyStone	-1,{
	mes "["+strnpcinfo(0)+"]";
	mes "o̦KοKsZҮɩһݭnΨ쪺ݡC";
	mes "o̦ҪZ1";
	mes "^007777jƪZ-żƤ@^000000";
	mes "HκҪZ2";
	mes "^007777jƪZ-żƤG^000000C";
	next;
	switch (select("jƪZ-żƤ@ - 200zeny","jƪZ-żƤG - 1000zeny","߰ݦSL")) {
	case 1:
		set '@price,200;
		set '@itemid,1010;
		break;
	case 2:
		set '@price,1000;
		set '@itemid,1011;
		break;
	case 3:
		mes "["+strnpcinfo(0)+"]";
		mes "AݪӬOs@Z1P2HWһݭnݧaC";
		mes "ڷQAӤ]DAݩMTK";
		mes "쥻NoK";
		close;
	}
	mes "["+strnpcinfo(0)+"]";
	mes "AQnʶRhּƶqH";
	mes "nפпJu0vC";
	while(1) {
		next;
		input '@num;
		if('@num<=0) {
			mes "["+strnpcinfo(0)+"]";
			mes "פC";
			close;
		}
		if('@num>500) {
			mes "["+strnpcinfo(0)+"]";
			mes "пJ500ӥHUƶqC";
			continue;
		}
		break;	//whiler
	}
	if(Zeny<'@price*'@num) {
		mes "["+strnpcinfo(0)+"]";
		mes "rKȤHAAC";
		mes "ܩpAڭ̬OpgAKy@IAC";
		close;
	}
	if(checkweight('@itemid,'@num)==0) {
		mes "["+strnpcinfo(0)+"]";
		mes "ӦhFC";
		mes "оzAӧaC";
		close;
	}
	set Zeny,Zeny-'@price*'@num;
	getitem '@itemid,'@num;
	mes "["+strnpcinfo(0)+"]";
	mes "oOAݭnFAh´fUC";
	close;
}

alberta_in.gat,13,71,4	duplicate(BuyStone)	d԰Ҳ	86
prt_in.gat,56,68,4	duplicate(BuyStone)	ǶV	86
morocc_in.gat,63,32,0	duplicate(BuyStone)	Fw		99
payon.gat,145,178,4	duplicate(BuyStone)	BJǼw	88
yuno_in01.gat,171,27,4	duplicate(BuyStone)	wp	86
ein_in01.gat,15,87,4	duplicate(BuyStone)	}ַN	86


//====================================================================
//ۥ洫NPC
//--------------------------------------------------------------------

-	script	ChangeStone	-1,{
	mes "["+strnpcinfo(3)+"]";	//ѧOlyѷ
	mes "unANݩξTۮӵڡA";
	mes "ڰWNiHAүݥHξTC";
	mes "ڷQA]DnaӭۨӰڡI";
	next;
	switch (select("s@","s@T","߰ݦݩʥ۬ƶ")) {
	case 1:
		set '@itemid,756;
		set '@gain,984;
		break;
	case 2:
		set '@itemid,757;
		set '@gain,985;
		break;
	case 3:
		mes "["+strnpcinfo(3)+"]";
		mes "ҿתݩʥۡK";
		mes "ڰҪݳowgFGQ~A";
		mes "ťLܦhoǻK";
		mes "٨SڨLOI";
		mes "ڻݱaBBaBݩʡC";
		next;
		mes "["+strnpcinfo(3)+"]";
		mes "ťbҪZɥ[Jݩʥ۪ܡK";
		mes "һs@XӪZN֦ݩʥ۪WjOqC";
		mes "KLܻ^ӡA";
		mes "వXoتZHA";
		mes "Q@w֦ҧ޳NaC";
		close;
	}
	if(countitem('@itemid)<5) {
		mes "["+strnpcinfo(3)+"]";
		mes "AAb}ܡH";
		mes getitemname('@itemid)+ "pG5ӪܡA";
		mes "OLkX" +getitemname('@gain)+ "C";
		mes "ڤOFܡH";
		close;
	}
	delitem '@itemid,5;
	getitem '@gain,1;
	mes "["+strnpcinfo(3)+"]";
	mes "ӬwAoO" +getitemname('@gain)+ "C";
	mes "wAӡC";
	close;
}

alberta_in.gat,21,63,5	duplicate(ChangeStone)	մ::	84
prt_in.gat,63,69,4	duplicate(ChangeStone)	үSߦ		84
morocc_in.gat,72,32,0	duplicate(ChangeStone)	ȫש		99
payon.gat,137,178,5	duplicate(ChangeStone)	L			88
yuno_in01.gat,164,27,4	duplicate(ChangeStone)	wp		84
ein_in01.gat,18,82,5	duplicate(ChangeStone)	ҭ׶	84


//====================================================================
//ZײzNPC
//--------------------------------------------------------------------

-	script	Repairer	-1,{
	mes "[ײzu]";
	mes "ȫȡA";
	mes "Qnײz~ܡH";
	mes "nײz~N浹ڧaI";
	next;
	if(select("ڦ~nײzKK","{b٨S~nײz")==2) {
		mes "[ײzu]";
		mes "K";
		mes "Snײz~NSڪƤFC";
		close;
	}
	set '@num,getrepairableitemcount();
	if('@num==0) {
		mes "[ײzu]";
		mes "uKK";
		mes "ݨӧAuܷ|ާ@~ڡA";
		mes "S@Өl~ڡH";
		mes "KK";
		mes "AoؤHVhA";
		mes "ڤ[N|~FKK";
		close;
	}
	set '@price,'@num*5000;
	mes "[ײzu]";
	mes "KK";
	mes "AWla~@@" +'@num+ "C";
	next;
	mes "[ײzu]";
	mes "𮧤@󪫫~ݭn 5000 ZenyC";
	mes "ײzݭn" +'@price+ "ZenyC";
	mes "nײzܡH";
	next;
	if(select("ײz","")==2) {
		mes "[ײzu]";
		mes "pGFaFA";
		mes "bW]ϥΡA";
		mes "uOŶڡC";
		mes "ҥHAɦ״_la~aC";
		close;
	}
	if(Zeny<'@price) {
		mes "[ײzu]";
		mes "AC";
		close;
	}
	set Zeny,Zeny-'@price;
	repairitem;
	mes "[ײzu]";
	mes "OKI";
	mes "ײzC";
	mes "oӪ~ϥιةRSFC";
	close;
}

alberta_in.gat,31,65,4	duplicate(Repairer)	ײzu	84
prt_in.gat,63,54,2	duplicate(Repairer)	ײzu	86
morocc_in.gat,71,41,4	duplicate(Repairer)	ײzu	99
payon.gat,143,165,7	duplicate(Repairer)	ײzu	88
geffen_in.gat,34,166,2	duplicate(Repairer)	ײzu	86
aldeba_in.gat,38,60,2	duplicate(Repairer)	ײzu	86
yuno_in01.gat,175,28,2	duplicate(Repairer)	ײzu	86
